/* Make Tables 1-2.*/

clear all

cd "C:\Users\valen909\Dropbox\Hoover\America1Room\Climate\data\Full_With_FollowUp"

/* This Sample only has data from control and treament group members
who answer survey questions at T1, T2, AND T3 */
use climate_data_foranalyses_27items.dta

/* Change to output directory */
cd "C:\Users\valen909\Dropbox\Hoover\America1Room\Climate\output\for_paper\27item_PBS"

log using reg_27itemPBS_belief_worry.log, replace

/* Table 1 */
/* Regs for Table 1, corresponding to Figures 1, 4, and 5. Formatted results can be found in Regression_Table1_27itemPBS.xlsx. */
reg ideology_diff1_2 c.ideology_score1##i.delegate
di e(r2_a)
reg ideology_diff1_2 c.ideology_score1##i.delegate lean_republican metro female internet lowinc white hs_or_less married employed over60 i.state_id, robust
di e(r2_a)
reg worry_diff1_2 c.ideology_score1##i.delegate
di e(r2_a)
reg worry_diff1_2 c.ideology_score1##i.delegate lean_republican metro female internet lowinc white hs_or_less married employed over60 i.state_id, robust
di e(r2_a)
reg belief_diff1_2 c.ideology_score1##i.delegate
di e(r2_a)
reg belief_diff1_2 c.ideology_score1##i.delegate lean_republican metro female internet lowinc white hs_or_less married employed over60 i.state_id, robust
di e(r2_a)

/* Table 2. Formatted results can be found in Regression_Table1_27itemPBS.xlsx. */
reg ideology_diff1_2 c.worry_diff1_2##i.delegate c.belief_diff1_2##i.delegate, robust
di e(r2_a)
reg ideology_diff1_2 c.worry_diff1_2##i.delegate c.belief_diff1_2##i.delegate lean_republican metro female internet lowinc white hs_or_less married employed over60 i.state_id, robust
di e(r2_a)

log close